load "header.plt"

set size 0.9, 1

set logscale x 2
set logscale y 10
xmin=1; xmax=1024
ymin=1; ymax=1e+30

set xrange [xmin:xmax]
set yrange [ymin:ymax]

set xtics nomirror 1,2,xmax
set ytics nomirror 1,10,ymax

k=4
xleg=xmax*1.01
yleg=ymax*1.01

set linestyle 1 linetype 5 linewidth 1 pointtype 1 pointsize 1

set label "k" at xleg,k left
set label "n" at xleg,xmax left
set label "n^2" at xleg,xmax**2 left
set label "n^4" at xleg,xmax**4.0 left
set label "2^n" at 100,yleg
set label "n^n" at 20,yleg

fact(n) = int(n)!

set output "log.cgm"
plot [n=xmin:xmax] \
	k title "k", \
	n title "n", \
	n**2 title "n^2", \
	n**4 title "n^4", \
	2**n title "2^n", \
	n**n title "n^n"

load "footer.plt"
# EOF
